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-- file OILALRDefs.mesa 

-- last modified by Barbara, June 28, 1978 4:34 PM 

DILALRDefs: DEFINITIONS - PRIVATE 

BEGIN -- data structures used by the Debugger Interpreter parser 

Symbol: TYPE « [0. .377B]; 
State: TYPE = CARDINAL; 

AsstlEntry: TYPE = MACHINE DEPENDENT RECORD [ 

tien: [0..377B], -- number of terminal entries 

assocsym: Symbol]; — associated symbol 

ActionTag: TYPE =« MACHINE DEPENDENT RECORD [ 

reduce: BOOLEAN, -- TRUE iff reduce entry 

plength: [0..17B]]; -- number of symbols in production rhs 

ActionEntry: TYPE » MACHINE DEPENDENT RECORD [ 

rtag: ActionTag, -- [FALSE, 0] if a shift entry 

transition: [0..3777B]]; -- production number / next state 

Productionlnfo: TYPE - MACHINE DEPENDENT RECORD [ 
rule: [0..377B], -- reduction rule 

Ihs: Symbol]; -- production Ihs symbol 

VocabHashEntry: TYPE ■= MACHINE DEPENDENT RECORD [ 
symptr: [0..377B], -- symbol index 
link: [0,.377B]]; -- link to next entry 

SymbolRecord: TYPE = RECORD [ 

class: Symbol, -- the token class 

value: UNSPECIFIED, 

index: CARDINAL]; -- source line index 

-- token indices for the scanner 

tokenID: Symbol « 1; 
tokenNUM: Symbol = 2; 
tokenLNUM: Symbol « 3; 
tokenSTR: Symbol « 4; 
tokenCHAR: Symbol = 5 
tokenDOT: Symbol = 15 
tokenDOTS: Symbol « 8 

-- output of the table generator 

hashval : CARDINAL = 55; 

endmarker: Symbol = 36; 
lastntstate: State = 23; 

LALRTableHandle: PUBLIC TYPE = POINTER TO LALRTable; 

LALRTable: PUBLIC TYPE = PRIVATE MACHINE DEPENDENT RECORD [ 
scantable: RECORD[ 

hashtab: ARRAY [0.. 55] OF VocabHashEntry, 

scantab: ARRAY CHARACTER [40C..177C] OF Symbol, 

vocabbody: RECORD [ -- a string body 
length, maxlength: CARDINAL, 
text: ARRAY [0.. 59) OF UNSPECIFIED], 

vocabindex: ARRAY [0.. 36] OF CARDINAL], 
parsetable: RECORD[ 

proddata: ARRAY [0.. 61] OF Productionlnfo. 

nstate: ARRAY [0.. 23] OF CARDINAL, 

nlen: ARRAY [0.. 23] OF CARDINAL. 

nsym: ARRAY [0.. 23] OF Symbol. 

nact: ARRAY [0.. 23] OF ActionEntry. 

ntdefaults: ARRAY [0.. 20] OF ActionEntry, 

asstl: ARRAY [0,. 54] OF AsstlEntry, 

tstate: ARRAY [0.. 54] OF CARDINAL, 

tsym: ARRAY [0..148] OF Symbol. 

tact: ARRAY [0..148] OF ActionEntry]]; 

END. 


